%%BeginProcset: (Fractal Design Painter/shapes) 4.0
% shapes procset
% TEXT resource 1001
% Glenn Reid, August 1995

/bdef { bind def } bind def
/ldef { load def } bdef
/c /curveto ldef
/m /moveto ldef
/l /lineto ldef
/cp /closepath ldef
/gs /gsave ldef
/gr /grestore ldef
/s { setlinewidth setlinejoin setlinecap stroke } bdef
/labeltext {	% (label text) x y labeltext
	moveto show
} bdef
/bs {
	gsave
} bdef
/es {
	grestore
} bdef
/rgb /setrgbcolor ldef

%%EndProcset